home *** CD-ROM | disk | FTP | other *** search
/ Star Festival... a Return to Japan / Star Festival... a Return to Japan.iso / pc / STARFESTIVAL / 08p.dir / 00001.ls next >
Encoding:
Text File  |  1999-04-08  |  2.1 KB  |  77 lines
  1. on startMovie
  2.   global gKnobSprite, gSendMovie, gCursorReady, gKnobState, gplaybtnsprite, gFNEngBtnSprite, zeoIdle
  3.   zeoIdle = 0
  4.   gplaybtnsprite = 0
  5.   gFNEngBtnSprite = 28
  6.   puppetSprite(gFNEngBtnSprite, 1)
  7.   puppetSprite(48, 1)
  8.   gCursorReady = 1
  9.   gKnobSprite = 14
  10.   gSendMovie = "08p"
  11.   gKnobState = 1
  12.   puppetSprite(gKnobSprite, 1)
  13.   setUpKnob()
  14.   set the mouseDownScript to EMPTY
  15.   set the mouseUpScript to EMPTY
  16.   sprite(28).visible = 0
  17. end
  18.  
  19. on stopMovie
  20.   global gplaybtnsprite, gFNEngBtnSprite, zeoIdle
  21.   puppetSprite(gFNEngBtnSprite, 0)
  22.   puppetSprite(sprite(11), 0)
  23.   stopmovieqt()
  24.   gplaybtnsprite = 23
  25.   zeoIdle = 0
  26. end
  27.  
  28. on idle
  29.   global gCursorReady
  30.   if gCursorReady = 1 then
  31.     cursor(200)
  32.     checkCursors()
  33.     set the locH of sprite 48 to the mouseH
  34.     set the locV of sprite 48 to the mouseV
  35.     updateStage()
  36.   end if
  37.   qtidle()
  38. end
  39.  
  40. on checkCursors
  41.   global zeoIdle
  42.   set the castNum of sprite 48 to the number of member "curs1"
  43.   repeat with i = 15 to 17
  44.     if rollOver(i) then
  45.       set the castNum of sprite 48 to the number of member "hotCursor"
  46.     end if
  47.   end repeat
  48.   if the castNum of sprite 12 and rollOver(12) then
  49.     if the castNum of sprite 52 and (sprite(52).movieRate = 1) then
  50.       set the castNum of sprite 48 to the number of member "nonCursor"
  51.     else
  52.       set the castNum of sprite 48 to the number of member "hotCursor"
  53.     end if
  54.   end if
  55.   if rollOver(28) and zeoIdle then
  56.     set the castNum of sprite 48 to the number of member "hotCursor"
  57.   end if
  58.   repeat with i = 19 to 25
  59.     if the castNum of sprite i and (rollOver(i) and not zeoIdle) then
  60.       set the castNum of sprite 48 to the number of member "hotCursor"
  61.     end if
  62.   end repeat
  63.   repeat with i = 31 to 32
  64.     if rollOver(i) then
  65.       set the castNum of sprite 48 to the number of member "hotCursor"
  66.     end if
  67.   end repeat
  68.   repeat with i = 40 to 42
  69.     if rollOver(i) then
  70.       set the castNum of sprite 48 to the number of member "hotCursor"
  71.     end if
  72.   end repeat
  73.   if the castNum of sprite 47 and rollOver(47) then
  74.     set the castNum of sprite 48 to the number of member "hotCursor"
  75.   end if
  76. end
  77.